﻿<!--#include file="inc/Main.asp"-->
<%
'***********************
'Code for MwCMS
'***********************
dim typeid,sortid,page,id,templatePath,infoStr,tempstr
typeid = getint(getForm("typeid", "get"),0)
sortid = getint(getForm("sortid", "get"),0)
id = getint(getForm("id", "get"),0)
page = getint(getForm("page", "get"),1)
tempstr=conn.db("select TemplateName from {pre}Navigation where ID="&sortid&"","1")(0)
if instr(tempstr,"|")>0 then templatePath = PubTemp&split(tempstr,"|")(1) else echoMsg 0,"","频道模板格式错误"
with templateObj : .load(templatePath) : .parseTemplate() : infoStr = .content end with
infoStr=showOut(infoStr,typeid,sortid,id,page)
with templateObj : .content = infoStr : .parseComm() : infoStr = .content end with
Echo infoStr
terminateAllObjects
%>